{Max of Integers}
var
  max, n : longint;
begin
  read(max);
  while not (eoln or eof) do
  begin
    read(n);
    if n > max then max := n;
  end;
  writeln(max);
end.
